Módulo 2: Trabalhando com dados
Carolina Musso
PROFESP, DEMSP, MS
Função mutate()
Tipo uma tabela dinâmica, com group_by + summarise()
Mais sobre o pacote flextable: cores e bordas
letalidade_Brasil_Italia <- dados_covid %>%
filter(Country=="Brazil"|Country=="Italy",
New_cases>0) %>%
mutate(letalidade_diaria = New_deaths/New_cases*100) %>%
group_by(Country) %>%
summarise(letalidade_media = mean(letalidade_diaria),
desvio_padrao = sd(letalidade_diaria ),
Casos_maximo = max(New_cases),
Obitos_maximo = max(New_deaths))
letalidade_Brasil_Italia# A tibble: 2 × 5
Country letalidade_media desvio_padrao Casos_maximo Obitos_maximo
<chr> <dbl> <dbl> <int> <int>
1 Brazil 2.11 1.68 298408 4249
2 Italy 3.00 5.53 228123 993
O mutate_if
letalidade_Brasil_Italia_trat <- letalidade_Brasil_Italia %>%
mutate_if(is.numeric, ~format(., big.mark=".", decimal.mark=",", digits=2))
letalidade_Brasil_Italia_trat# A tibble: 2 × 5
Country letalidade_media desvio_padrao Casos_maximo Obitos_maximo
<chr> <chr> <chr> <chr> <chr>
1 Brazil 2,1 1,7 298.408 "4.249"
2 Italy 3,0 5,5 228.123 " 993"
Criar um estilo
pacote officer: como uma extensão do flextable
. . .